/************************************************************************
  Scheme interpreter
  
  Copyright (C) 2010 Marioly Garza 

  This program is free software: you can redistribute it and/or modify
  it under the terms of the GNU Lesser General Public License as
  published by the Free Software Foundation, either version 3 of the
  License, or (at your option) any later version.
  
  This program is distributed in the hope that it will be useful, but
  WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  Lesser General Public License for more details.
  
  You should have received a copy of the GNU Lesser General Public
  License along with this program. If not, see
  <http://www.gnu.org/licenses/>.

************************************************************************/

#ifndef _SBOOLEAN_H_
#define _SBOOLEAN_H_

#include "object.h"

class sboolean : public object
{
    public:
        sboolean(bool val) {
            this->val = val;
        }

        bool operator ==(int c)
        {
            return this->val == c;
        }

        operator bool() { return this->val; }

        std::string to_string()
        {
            return this->val ? "#t" : "#f";
        }

    private:
        bool val;
};

#endif
